﻿
Public Class ProveedorBE

    Private iCodigo As Integer
    Private sRazonSocial As String
    Private sRuc As String
    Private sUsuario As String
    Private sNombre As String

    Public Sub New()

    End Sub

    Public Sub New(ByVal strNombre As String)
        sNombre = strNombre
    End Sub

    Public Property Codigo() As Integer
        Get
            Return iCodigo
        End Get
        Set(ByVal value As Integer)
            iCodigo = value
        End Set
    End Property

    Public Property RazonSocial() As String
        Get
            Return sRazonSocial
        End Get
        Set(ByVal value As String)
            sRazonSocial = value
        End Set
    End Property

    Public Property Ruc() As String
        Get
            Return sRuc
        End Get
        Set(ByVal value As String)
            sRuc = value
        End Set
    End Property

    Public Property UsuarioCreador() As String
        Get
            Return sUsuario
        End Get
        Set(ByVal value As String)
            sUsuario = value
        End Set
    End Property





End Class
